/ CyberMycha 2004 August / CyberMycha 08-2004 (Poland).bin / Spiderman2 / MainApp.cab / GUI.u / GUIComponent_GUIFloatEdit_ScriptText.TextBuffer

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 76 22 2f 2f 20 3d 3d 3d |........|v"// ===|
|00000010| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000020| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000030| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000040| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000050| 3d 0d 0a 2f 2f 20 28 43 | 29 20 32 30 30 32 2c 20 |=..// (C|) 2002, |
|00000060| 45 70 69 63 20 47 61 6d | 65 73 0d 0a 2f 2f 20 3d |Epic Gam|es..// =|
|00000070| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000080| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000090| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000b0| 3d 3d 3d 0d 0a 0d 0a 63 | 6c 61 73 73 20 47 55 49 |===....c|lass GUI|
|000000c0| 46 6c 6f 61 74 45 64 69 | 74 20 65 78 74 65 6e 64 |FloatEdi|t extend|
|000000d0| 73 20 47 55 49 4d 75 6c | 74 69 43 6f 6d 70 6f 6e |s GUIMul|tiCompon|
|000000e0| 65 6e 74 0d 0a 09 4e 61 | 74 69 76 65 3b 0d 0a 0d |ent...Na|tive;...|
|000000f0| 0a 0d 0a 2f 2f 20 28 63 | 70 70 74 65 78 74 29 0d |...// (c|pptext).|
|00000100| 0a 2f 2f 20 28 63 70 70 | 74 65 78 74 29 0d 0a 2f |.// (cpp|text)../|
|00000110| 2f 20 28 63 70 70 74 65 | 78 74 29 0d 0a 2f 2f 20 |/ (cppte|xt)..// |
|00000120| 28 63 70 70 74 65 78 74 | 29 0d 0a 0d 0a 76 61 72 |(cpptext|)....var|
|00000130| 20 41 75 74 6f 6d 61 74 | 65 64 20 47 55 49 45 64 | Automat|ed GUIEd|
|00000140| 69 74 42 6f 78 20 4d 79 | 45 64 69 74 42 6f 78 3b |itBox My|EditBox;|
|00000150| 0d 0a 76 61 72 20 41 75 | 74 6f 6d 61 74 65 64 20 |..var Au|tomated |
|00000160| 47 55 49 53 70 69 6e 6e | 65 72 42 75 74 74 6f 6e |GUISpinn|erButton|
|00000170| 20 4d 79 50 6c 75 73 3b | 0d 0a 76 61 72 20 41 75 | MyPlus;|..var Au|
|00000180| 74 6f 6d 61 74 65 64 20 | 47 55 49 53 70 69 6e 6e |tomated |GUISpinn|
|00000190| 65 72 42 75 74 74 6f 6e | 20 4d 79 4d 69 6e 75 73 |erButton| MyMinus|
|000001a0| 3b 0d 0a 0d 0a 76 61 72 | 28 4d 65 6e 75 29 09 73 |;....var|(Menu).s|
|000001b0| 74 72 69 6e 67 09 09 09 | 09 56 61 6c 75 65 3b 0d |tring...|.Value;.|
|000001c0| 0a 76 61 72 28 4d 65 6e | 75 29 09 62 6f 6f 6c 09 |.var(Men|u).bool.|
|000001d0| 09 09 09 62 4c 65 66 74 | 4a 75 73 74 69 66 69 65 |...bLeft|Justifie|
|000001e0| 64 3b 0d 0a 76 61 72 28 | 4d 65 6e 75 29 09 66 6c |d;..var(|Menu).fl|
|000001f0| 6f 61 74 09 09 09 09 4d | 69 6e 56 61 6c 75 65 3b |oat....M|inValue;|
|00000200| 0d 0a 76 61 72 28 4d 65 | 6e 75 29 09 66 6c 6f 61 |..var(Me|nu).floa|
|00000210| 74 09 09 09 09 4d 61 78 | 56 61 6c 75 65 3b 0d 0a |t....Max|Value;..|
|00000220| 76 61 72 28 4d 65 6e 75 | 29 09 66 6c 6f 61 74 09 |var(Menu|).float.|
|00000230| 09 09 09 53 74 65 70 3b | 0d 0a 0d 0a 66 75 6e 63 |...Step;|....func|
|00000240| 74 69 6f 6e 20 49 6e 69 | 74 43 6f 6d 70 6f 6e 65 |tion Ini|tCompone|
|00000250| 6e 74 28 47 55 49 43 6f | 6e 74 72 6f 6c 6c 65 72 |nt(GUICo|ntroller|
|00000260| 20 4d 79 43 6f 6e 74 72 | 6f 6c 6c 65 72 2c 20 47 | MyContr|oller, G|
|00000270| 55 49 43 6f 6d 70 6f 6e | 65 6e 74 20 4d 79 4f 77 |UICompon|ent MyOw|
|00000280| 6e 65 72 29 0d 0a 7b 0d | 0a 0d 0a 09 53 75 70 65 |ner)..{.|....Supe|
|00000290| 72 2e 49 6e 69 74 63 6f | 6d 70 6f 6e 65 6e 74 28 |r.Initco|mponent(|
|000002a0| 4d 79 43 6f 6e 74 72 6f | 6c 6c 65 72 2c 20 4d 79 |MyContro|ller, My|
|000002b0| 4f 77 6e 65 72 29 3b 0d | 0a 0d 0a 09 4d 79 45 64 |Owner);.|....MyEd|
|000002c0| 69 74 42 6f 78 2e 4f 6e | 43 68 61 6e 67 65 20 3d |itBox.On|Change =|
|000002d0| 20 45 64 69 74 4f 6e 43 | 68 61 6e 67 65 3b 0d 0a | EditOnC|hange;..|
|000002e0| 09 4d 79 45 64 69 74 42 | 6f 78 2e 53 65 74 54 65 |.MyEditB|ox.SetTe|
|000002f0| 78 74 28 56 61 6c 75 65 | 29 3b 0d 0a 09 4d 79 45 |xt(Value|);...MyE|
|00000300| 64 69 74 42 6f 78 2e 4f | 6e 4b 65 79 45 76 65 6e |ditBox.O|nKeyEven|
|00000310| 74 20 3d 20 45 64 69 74 | 4b 65 79 45 76 65 6e 74 |t = Edit|KeyEvent|
|00000320| 3b 0d 0a 0d 0a 09 4d 79 | 45 64 69 74 42 6f 78 2e |;.....My|EditBox.|
|00000330| 49 4e 49 4f 70 74 69 6f | 6e 20 20 3d 20 49 4e 49 |INIOptio|n  = INI|
|00000340| 4f 70 74 69 6f 6e 3b 0d | 0a 09 4d 79 45 64 69 74 |Option;.|..MyEdit|
|00000350| 42 6f 78 2e 49 4e 49 44 | 65 66 61 75 6c 74 20 3d |Box.INID|efault =|
|00000360| 20 49 4e 49 44 65 66 61 | 75 6c 74 3b 0d 0a 0d 0a | INIDefa|ult;....|
|00000370| 09 43 61 6c 63 4d 61 78 | 4c 65 6e 28 29 3b 0d 0a |.CalcMax|Len();..|
|00000380| 0d 0a 09 4d 79 50 6c 75 | 73 2e 4f 6e 43 6c 69 63 |...MyPlu|s.OnClic|
|00000390| 6b 20 3d 20 53 70 69 6e | 6e 65 72 50 6c 75 73 43 |k = Spin|nerPlusC|
|000003a0| 6c 69 63 6b 3b 0d 0a 09 | 4d 79 50 6c 75 73 2e 46 |lick;...|MyPlus.F|
|000003b0| 6f 63 75 73 49 6e 73 74 | 65 61 64 20 3d 20 4d 79 |ocusInst|ead = My|
|000003c0| 45 64 69 74 42 6f 78 3b | 0d 0a 09 4d 79 4d 69 6e |EditBox;|...MyMin|
|000003d0| 75 73 2e 4f 6e 43 6c 69 | 63 6b 20 3d 20 53 70 69 |us.OnCli|ck = Spi|
|000003e0| 6e 6e 65 72 4d 69 6e 75 | 73 43 6c 69 63 6b 3b 0d |nnerMinu|sClick;.|
|000003f0| 0a 09 4d 79 4d 69 6e 75 | 73 2e 46 6f 63 75 73 49 |..MyMinu|s.FocusI|
|00000400| 6e 73 74 65 61 64 20 3d | 20 4d 79 45 64 69 74 42 |nstead =| MyEditB|
|00000410| 6f 78 3b 0d 0a 0d 0a 20 | 20 20 20 53 65 74 48 69 |ox;.... |   SetHi|
|00000420| 6e 74 28 48 69 6e 74 29 | 3b 0d 0a 0d 0a 7d 0d 0a |nt(Hint)|;....}..|
|00000430| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 53 65 74 48 69 |..functi|on SetHi|
|00000440| 6e 74 28 73 74 72 69 6e | 67 20 4e 65 77 48 69 6e |nt(strin|g NewHin|
|00000450| 74 29 0d 0a 7b 0d 0a 09 | 6c 6f 63 61 6c 20 69 6e |t)..{...|local in|
|00000460| 74 20 69 3b 0d 0a 09 53 | 75 70 65 72 2e 53 65 74 |t i;...S|uper.Set|
|00000470| 48 69 6e 74 28 4e 65 77 | 48 69 6e 74 29 3b 0d 0a |Hint(New|Hint);..|
|00000480| 0d 0a 20 20 20 20 66 6f | 72 20 28 69 3d 30 3b 69 |..    fo|r (i=0;i|
|00000490| 3c 43 6f 6e 74 72 6f 6c | 73 2e 4c 65 6e 67 74 68 |<Control|s.Length|
|000004a0| 3b 69 2b 2b 29 0d 0a 20 | 20 20 20 09 43 6f 6e 74 |;i++).. |   .Cont|
|000004b0| 72 6f 6c 73 5b 69 5d 2e | 53 65 74 48 69 6e 74 28 |rols[i].|SetHint(|
|000004c0| 4e 65 77 48 69 6e 74 29 | 3b 0d 0a 7d 0d 0a 0d 0a |NewHint)|;..}....|
|000004d0| 66 75 6e 63 74 69 6f 6e | 20 43 61 6c 63 4d 61 78 |function| CalcMax|
|000004e0| 4c 65 6e 28 29 0d 0a 7b | 0d 0a 09 6c 6f 63 61 6c |Len()..{|...local|
|000004f0| 20 69 6e 74 20 64 69 67 | 69 74 63 6f 75 6e 74 2c | int dig|itcount,|
|00000500| 78 3b 0d 0a 0d 0a 09 64 | 69 67 69 74 63 6f 75 6e |x;.....d|igitcoun|
|00000510| 74 3d 31 3b 0d 0a 09 78 | 3d 31 30 3b 0d 0a 09 77 |t=1;...x|=10;...w|
|00000520| 68 69 6c 65 20 28 78 3c | 4d 61 78 56 61 6c 75 65 |hile (x<|MaxValue|
|00000530| 29 0d 0a 09 7b 0d 0a 09 | 09 64 69 67 69 74 63 6f |)...{...|.digitco|
|00000540| 75 6e 74 2b 2b 3b 0d 0a | 09 09 78 2a 3d 31 30 3b |unt++;..|..x*=10;|
|00000550| 0d 0a 09 7d 0d 0a 0d 0a | 09 4d 79 45 64 69 74 42 |...}....|.MyEditB|
|00000560| 6f 78 2e 4d 61 78 57 69 | 64 74 68 20 3d 20 44 69 |ox.MaxWi|dth = Di|
|00000570| 67 69 74 43 6f 75 6e 74 | 2b 34 3b 0d 0a 7d 0d 0a |gitCount|+4;..}..|
|00000580| 66 75 6e 63 74 69 6f 6e | 20 53 65 74 56 61 6c 75 |function| SetValu|
|00000590| 65 28 66 6c 6f 61 74 20 | 56 29 0d 0a 7b 0d 0a 09 |e(float |V)..{...|
|000005a0| 69 66 20 28 76 3c 4d 69 | 6e 56 61 6c 75 65 29 0d |if (v<Mi|nValue).|
|000005b0| 0a 09 09 76 3d 4d 69 6e | 56 61 6c 75 65 3b 0d 0a |...v=Min|Value;..|
|000005c0| 0d 0a 09 69 66 20 28 76 | 3e 4d 61 78 56 61 6c 75 |...if (v|>MaxValu|
|000005d0| 65 29 0d 0a 09 09 76 3d | 4d 61 78 56 61 6c 75 65 |e)....v=|MaxValue|
|000005e0| 3b 0d 0a 0d 0a 09 4d 79 | 45 64 69 74 42 6f 78 2e |;.....My|EditBox.|
|000005f0| 53 65 74 54 65 78 74 28 | 22 22 24 76 29 3b 0d 0a |SetText(|""$v);..|
|00000600| 7d 0d 0a 0d 0a 66 75 6e | 63 74 69 6f 6e 20 62 6f |}....fun|ction bo|
|00000610| 6f 6c 20 53 70 69 6e 6e | 65 72 50 6c 75 73 43 6c |ol Spinn|erPlusCl|
|00000620| 69 63 6b 28 47 55 49 43 | 6f 6d 70 6f 6e 65 6e 74 |ick(GUIC|omponent|
|00000630| 20 53 65 6e 64 65 72 29 | 0d 0a 7b 0d 0a 09 6c 6f | Sender)|..{...lo|
|00000640| 63 61 6c 20 66 6c 6f 61 | 74 20 76 3b 0d 0a 0d 0a |cal floa|t v;....|
|00000650| 09 76 20 3d 20 66 6c 6f | 61 74 28 56 61 6c 75 65 |.v = flo|at(Value|
|00000660| 29 20 2b 20 53 74 65 70 | 3b 0d 0a 20 20 20 20 53 |) + Step|;..    S|
|00000670| 65 74 56 61 6c 75 65 28 | 76 29 3b 0d 0a 09 72 65 |etValue(|v);...re|
|00000680| 74 75 72 6e 20 74 72 75 | 65 3b 0d 0a 7d 0d 0a 0d |turn tru|e;..}...|
|00000690| 0a 66 75 6e 63 74 69 6f | 6e 20 62 6f 6f 6c 20 53 |.functio|n bool S|
|000006a0| 70 69 6e 6e 65 72 4d 69 | 6e 75 73 43 6c 69 63 6b |pinnerMi|nusClick|
|000006b0| 28 47 55 49 43 6f 6d 70 | 6f 6e 65 6e 74 20 53 65 |(GUIComp|onent Se|
|000006c0| 6e 64 65 72 29 0d 0a 7b | 0d 0a 09 6c 6f 63 61 6c |nder)..{|...local|
|000006d0| 20 66 6c 6f 61 74 20 76 | 3b 0d 0a 0d 0a 09 76 20 | float v|;.....v |
|000006e0| 3d 20 66 6c 6f 61 74 28 | 56 61 6c 75 65 29 20 2d |= float(|Value) -|
|000006f0| 20 53 74 65 70 3b 0d 0a | 09 53 65 74 56 61 6c 75 | Step;..|.SetValu|
|00000700| 65 28 76 29 3b 0d 0a 09 | 72 65 74 75 72 6e 20 74 |e(v);...|return t|
|00000710| 72 75 65 3b 0d 0a 7d 0d | 0a 0d 0a 66 75 6e 63 74 |rue;..}.|...funct|
|00000720| 69 6f 6e 20 62 6f 6f 6c | 20 45 64 69 74 4b 65 79 |ion bool| EditKey|
|00000730| 45 76 65 6e 74 28 6f 75 | 74 20 62 79 74 65 20 4b |Event(ou|t byte K|
|00000740| 65 79 2c 20 6f 75 74 20 | 62 79 74 65 20 53 74 61 |ey, out |byte Sta|
|00000750| 74 65 2c 20 66 6c 6f 61 | 74 20 64 65 6c 74 61 29 |te, floa|t delta)|
|00000760| 0d 0a 7b 0d 0a 09 69 66 | 20 28 20 28 6b 65 79 3d |..{...if| ( (key=|
|00000770| 3d 30 78 45 43 29 20 26 | 26 20 28 53 74 61 74 65 |=0xEC) &|& (State|
|00000780| 3d 3d 33 29 20 29 0d 0a | 09 7b 0d 0a 09 09 53 70 |==3) )..|.{....Sp|
|00000790| 69 6e 6e 65 72 50 6c 75 | 73 43 6c 69 63 6b 28 6e |innerPlu|sClick(n|
|000007a0| 6f 6e 65 29 3b 0d 0a 09 | 09 72 65 74 75 72 6e 20 |one);...|.return |
|000007b0| 74 72 75 65 3b 0d 0a 09 | 7d 0d 0a 0d 0a 09 69 66 |true;...|}.....if|
|000007c0| 20 28 20 28 6b 65 79 3d | 3d 30 78 45 44 29 20 26 | ( (key=|=0xED) &|
|000007d0| 26 20 28 53 74 61 74 65 | 3d 3d 33 29 20 29 0d 0a |& (State|==3) )..|
|000007e0| 09 7b 0d 0a 09 09 53 70 | 69 6e 6e 65 72 4d 69 6e |.{....Sp|innerMin|
|000007f0| 75 73 43 6c 69 63 6b 28 | 6e 6f 6e 65 29 3b 0d 0a |usClick(|none);..|
|00000800| 09 09 72 65 74 75 72 6e | 20 74 72 75 65 3b 0d 0a |..return| true;..|
|00000810| 09 7d 0d 0a 0d 0a 09 72 | 65 74 75 72 6e 20 4d 79 |.}.....r|eturn My|
|00000820| 45 64 69 74 42 6f 78 2e | 49 6e 74 65 72 6e 61 6c |EditBox.|Internal|
|00000830| 4f 6e 4b 65 79 45 76 65 | 6e 74 28 4b 65 79 2c 53 |OnKeyEve|nt(Key,S|
|00000840| 74 61 74 65 2c 44 65 6c | 74 61 29 3b 0d 0a 0d 0a |tate,Del|ta);....|
|00000850| 0d 0a 7d 0d 0a 0d 0a 66 | 75 6e 63 74 69 6f 6e 20 |..}....f|unction |
|00000860| 45 64 69 74 4f 6e 43 68 | 61 6e 67 65 28 47 55 49 |EditOnCh|ange(GUI|
|00000870| 43 6f 6d 70 6f 6e 65 6e | 74 20 53 65 6e 64 65 72 |Componen|t Sender|
|00000880| 29 0d 0a 7b 0d 0a 09 56 | 61 6c 75 65 20 3d 20 4d |)..{...V|alue = M|
|00000890| 79 45 64 69 74 42 6f 78 | 2e 54 65 78 74 53 74 72 |yEditBox|.TextStr|
|000008a0| 3b 0d 0a 20 20 20 20 4f | 6e 43 68 61 6e 67 65 28 |;..    O|nChange(|
|000008b0| 53 65 6e 64 65 72 29 3b | 0d 0a 7d 0d 0a 0d 0a 00 |Sender);|..}.....|
+--------+-------------------------+-------------------------+--------+--------+